TEdit a stisk klavesy ENTER
Otázka od: Lubos Urban
13. 11. 2002 9:18
Mam pocit ze toto tu uz bolo ale nejak to nemozem najst 
Mam komponentu TEdit a napisal som do eventu OnKeyDown obsluhu na stisnutie
klavesy Enter, ale windows ma defaultne nastaveny nejaky sound ktory sa
prehra ked user stisne Enter v komponente ktora neni multiline.
Neviete ako to spravit aby to furt tak krepo nepipkalo (neprehravalo ten
jeho defaultny sound)
vopred dakujuci
Lubos Urban
P.S. Vypnutie Windowsackych Sound Schemes neni to prave riesenie 
Odpovedá: ing. Jan Fiala
13. 11. 2002 9:35
Presun to do OnKeyPress :
If Char = VK_Enter then
begin
neco provedu
Key := #0;
end;
--
ing. Jan Fiala
mailto:jan.fiala@iol.cz
13.11.2002 Lubos Urban:
> Mam pocit ze toto tu uz bolo ale nejak to nemozem najst
> Mam komponentu TEdit a napisal som do eventu OnKeyDown obsluhu na stisnutie
> klavesy Enter, ale windows ma defaultne nastaveny nejaky sound ktory sa
> prehra ked user stisne Enter v komponente ktora neni multiline.
> Neviete ako to spravit aby to furt tak krepo nepipkalo (neprehravalo ten
> jeho defaultny sound)
> vopred dakujuci
> Lubos Urban
> P.S. Vypnutie Windowsackych Sound Schemes neni to prave riesenie
Odpovedá: Lebeda David
13. 11. 2002 10:06
> If Char = VK_Enter then
> begin
> neco provedu
> Key := #0;
> end;
Jen upresneni:
VK_Enter asi ne. Pro Enter je VK_Return, ale ten jde pouzit jen v
OnKeyDown - neni to typ char. Tady je nutno pouzit hodnotu #13.
David Lebeda
Odpovedá: ing. Jan Fiala
13. 11. 2002 10:23
13.11.2002 Lebeda David:
>> If Char = VK_Enter then
>> begin
>> neco provedu
>> Key := #0;
>> end;
> Jen upresneni:
> VK_Enter asi ne. Pro Enter je VK_Return, ale ten jde pouzit jen v
> OnKeyDown - neni to typ char. Tady je nutno pouzit hodnotu #13.
omlouvam se, bylo to narychlo z hlavy. Spravne melo byt
If Char = Chr(VK_Return) then ...
--
ing. Jan Fiala
mailto:jan.fiala@iol.cz